﻿
#load "ImageProcess.fs"
open  Util.ImageProcess

open System.Drawing
open System.Drawing.Imaging
open System.Drawing.Drawing2D
open System.IO

let img = new Bitmap( @"F:\testImageProcess\100_0044.JPG")

let isSucccess = ImageProcess.ScaleToAndSave(0.1,img,@"F:\testImageProcess\100_0044aa.JPG")

ImageProcess.CompressBitmap(img, @"F:\testImageProcess\100_0044bb.JPG",(int64 10) )